%% Graph: counterfactual wage response
       
    fig = figure('visible','off','DefaultAxesFontSize',14);
    hold on  
    scatter(endog.nuc(1:end-2), endog.cf1_wage_all(1:end-2), 'filled', 'o', 'MarkerFaceColor',ones(1,3)*0.3)
    scatter(endog.nuc(1:end-2), endog.cf1_wage_exp(1:end-2), 'filled', 'd', 'MarkerFaceColor',ones(1,3)*0.5)
    scatter(endog.nuc(1:end-2), endog.cf1_wage_nonexp(1:end-2), 'filled', 's', 'MarkerFaceColor',ones(1,3)*0.6)
    hold off
    xlabel('\nu_c')
    ylabel('Counterfactual % \Delta Wage')    
    xlim([0.2, 1.0])
    xticks([0.2:0.1:1.0])
    ylim([0.5, 2.5])
    legend('All Firms', 'Exporters', 'Non-exporters', 'Location','northeast')
    %exportgraphics(fig,'../../output/figures/endogtarget_wage_response.pdf')    
    exportgraphics(fig,'../../output/figures/FigureA8.pdf')    
    
    
    
    